home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1993 / MacHack 1993.toast / MacHack™ 1987-1992 / MacHack™ '90 / Other Stuff / Demos ƒ / Demo AppMaker / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpP_1008_Icon < prev    next >
Encoding:
Text File  |  1990-03-23  |  538 b   |  28 lines
  1. %case window field%
  2. %case create%
  3. %case dispose%
  4. %case mousein%
  5. %case update%
  6.     SetRect (bounds, %left%, %top%, %right%, %bottom%);
  7.     PlotIconID (%iconID%, bounds);
  8. %case activate%
  9. %case track%
  10. %case itemNr%
  11.     %DefineItem%
  12. %case dialog field%
  13. %case init field%
  14. %case auxiliary%
  15. %case filter%
  16. %case set%
  17. %case hit%
  18.     %if enabled%
  19.         %if not lastInGroup%
  20.             %itemname%,
  21.         %else%
  22.             %itemname%: begin
  23.                 DoIconRadio (%firstRadio%, itemNr, %fieldname%);
  24.                 X%fieldname% := %fieldname%;    {for Filter proc}
  25.             end;
  26.         %endif%
  27.     %endif%
  28. %case finish%